WavePlayComplete
(Event)
Purpose:Fires when a playing Wave-file reaches the end.
Syntax:See Example.
Arguments:None.
Example:
Private Sub
Command1_Click()
____'Play a
Wave-file
____SoundCard1.MIDIPlay
"C:\Windows\Media\The Microsoft Sound.wav"
End Sub
Private Sub
SoundCard1_WavePlayComplete
____SoundCard1.WaveStop
'Close the
device
____Debug.Print
"Finished"
End Sub
Comments: The WavePlayComplete will not fire if playback was interrupted using WaveStop. Don't call WaveStop inside this Event, the Device is already closed.
See Also: